inherited CPContr1: TCPContr1
  Left = 39
  Top = 126
  HelpContext = 9
  Caption = 'CPContr1'
  ClientHeight = 298
  ClientWidth = 750
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Width = 750
    inherited CGauge1: TCGauge
      Width = 748
    end
  end
  inherited Panel2: TPanel
    Width = 750
    Height = 268
    object SpeedButton22: TSpeedButton [0]
      Left = 5
      Top = 2
      Width = 67
      Height = 25
      Caption = 'E&ditar'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
        000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
        00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
        F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
        0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
        FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
        FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
        0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
        00333377737FFFFF773333303300000003333337337777777333}
      NumGlyphs = 2
      OnClick = SpeedButton22Click
    end
    object PHGridEdit1: PHGridEdit
      Left = 4
      Top = 28
      Width = 739
      Height = 238
      PHDS = PHDS1
      Colunas.Strings = (
        'Descricao;191'
        'Arquivo;305'
        'Observacoes;200')
      ColCount = 4
      RowCount = 2
      TabOrder = 1
      ColWidths = (
        12
        191
        305
        200)
    end
  end
  inherited PHDS1: PHDataSource
    IndiceNome = 'Descricao'
    BeforePost = PHDS1BeforePost
    BeforeDelete = PHDS1BeforeDelete
    BeforeCancel = PHDS1BeforeCancel
  end
  object W1: TWordApplication
    AutoConnect = False
    ConnectKind = ckRunningOrNew
    OnQuit = W1Quit
    Left = 280
    Top = 30
  end
  object WordDocument1: TWordDocument
    AutoConnect = False
    ConnectKind = ckRunningOrNew
    Left = 320
    Top = 30
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = 'DOC'
    Filter = 'DOC|*.DOC|Todos|*.*'
    Options = [ofHideReadOnly, ofNoChangeDir, ofEnableSizing]
    Title = 'Gerador de Documentos'
    Left = 664
  end
end
